Peeks, Pokes and Pointers 


AppleZero-Page 


DECIMAL 


HEX 


32 


.$20 


33 


37 

43 

44 
48 

50 

51 


Text Window Left-Edge ( 0-39 / normal is o) . . 

Example: POKE 32, X freezes the left X columns of text. 

Warning: Don’t let PEEK(32)+PEEK(33) exceed the screen width. 

Text Window Width (1-40 or 1-80 / normal is 40 or 80) $21 
Note: POKE 33,33 scrunches listings to remove extra spaces. 

34 Text Window Top-Edge ( 0-23 / normal is o> $22 

35 Text Window Bottom ( 1 - 24 / normal is 24 ) $23 

36 Horizontal Cursor-Position ( 0 - 39 ) $24 

Examples: If PEEK(36)=X, then the cursor is in column X+1. 

POKE 36, X puts the cursor in column X+1 (useful with 80-columns, 
for positioning the cursor beyond the 40-column limit of HTAB). 
Note: POKE 1403, X works similarly— and more predictably. 

Vertical Cursor-Position ( 0 - 23 ) $25 

Examples: If PEEK(37)=Y, then the cursor is on text line Y+1. 

Boot Slot *16 (after boot) $2B 

Lo-Res Line End-Point $2C 

Lo-Res COLOR *17 $30 

Text Output Format $32 

POKE 50, 63=INVERSE, POKE 50, 255=NORMAL, 

POKE 50, 127=FLASH (for ASCII 64-95). 

Prompt-Character $33 

Note: POKE 51,0: GOTO line# will prevent a false “Not Direct Com- 
mand” message caused by an immediate GOTO line# command. 

78-79 Random-Number Field $4E.4F 

103-104 Start of Applesoft Program $67.68 

To Load a program at a non-standard location LOC— 

POKE LOC-1, 0: POKE 103, LOC-INT(LOC/256)*256: 

POKE 104, INT(LOC/256) Then LOAD PROGRAM 
Note: FP (DOS 3.3 only) sets start-of-program to normal 2049 ($801 ). 

105-106 LOMEM $69.6A 

Note: LOMEM is the Start of Variable-Space, equivalent to End-of- 
Program (approx.) unless changed with the LOMEM: command. 

107-108 Start of Array-Space $6B.6C 

109-110 End of Array-Space $6D.6E 

111-112 Start of String-Storage $6F.70 

115-116 HIMEM $73.74 

Note: HI MEM-1 is the highest address available for use by an Applesoft 
program. May be changed with the HIMEM: command. 

117-118 Une-Number Being Executed $75.76 

119-120 Une-No. Where Program Stopped $77.78 

121-122 Address of Line Executing $79.7A 

123-124 Current DATA Une-Number $7B.7C 

125-126 Next DATA Address $7D.7E 

127-128 INPUT or DATA Address $7F.80 

129-130 Last-Used Variable Name $81.82 

131-132 Last-Used- Variable Address $83.84 

175-176 End of Applesoft Program $AF.B0 

214 RUN Hag $D6 

Example: POKE 214, 255 makes any command RUN a program. 

216 ONERR Rag $D8 

Example: POKE 216, 0 cancels the ONERR function. 

218-219 Line-Number of ONERR Error . . . $DA.DB 

220-221 ONERR Error Address $DC.DD 

222 ONERR Error Code $DE 


DOS 3.3 and PRODOS 

1: Language Not Available 1 
2 or 3 1 : Range Error 
3: No Device Connected 2 
4: Write-Protected 
5: End of Data 
6: File 1 or Path 2 Not Found 
7: Volume Mismatch 1 
8: I/O Error 
9: Disk Full 
10: File Locked 


APPLESOFT 

0: ?Next Without For 
16: ?Syntax Error (FP) 

22: ?Return Without Gosub 
42: ? Out of Data 
53: ?lllegal Quantity 
69: ?Overflow 
77: ?Out of Memory 
90: ?Undefd Statement 
107: ?Bad Subscript 
120: ? Redim’d Array 


11: Syntax Error 1 or Invalid Option 2 133: ?Division by Zero 


12: No Buffers Available 
13: File Type Mismatch 
14: Program Too Large 
15: Not Direct Command 
17: Directory Full 2 
18: File Not Open 2 
19: Duplicate File Name 2 
20: File Busy 2 
21: File(s) Still Open 2 


163: ?Type Mismatch 
176: ?String Too Long 
191: ?Formula Too Complex 
224: ?Undef’d Function 
254: ? Re-Enter 
255: (control-C Interrupt) 

^OS 3.3 only 
2 ProDOS only 


224-225 X of Last HPLOT (0-279) $E0.E1 


226 

228 

230 


231 


Y of Last HPLOT ( 0 - 191 ) $E2 

HCOLOR Code $E4 

0=0, 42=1, 85=2, 127=3, 128=4, 170=5, 213=6, 255=7 

Hi-Res Plotting Page $E6 

POKE 230,32 selects Page 1. POKE 230,96 selects Page 3. 
POKE 230,64 selects Page 2. 

SCALE $E7 

Note: SCALE=0 is equivalent to a SCALE of 256. 

232-233 Shape Table Start Address $E8.E9 

234 Hi-Res Collision-Check $EA 

Example: XDRAW a shape. If PEEK(234)=0 then the shape 
started at a non-black hi-res point. 

speed $F1 

Note: PEEK(241) is 256 minus the current SPEED. 

FLASH Mask $F3 

ROT $F9 


241 

243 

249 


To get on a really good mailing list, write: 

BEAGLE BROS INC. 

3990 Old Town Avenue, Suite 102C 
San Diego, California 92110 


Display Switches 

DECIMAL (with negative equivalent) HEX 

49232 (-16304) Graphics $C050 

49233 (-16303) Text $C051 

49234 (-16302) Full-Graphics $C052 

49235 (-16301) Split-Screen $C053 

49236 (-16300) Page One $C054 

49237 (-16299) Page Two $C055 

49238 (-16298) Lo-Res $C056 

49239 (-16297) Hi-Res $C057 

Note: Activate display switches by Poking each location. 
Example: POKE 49232,0 switches to Graphics display. 

Keyboard, etc. 

DECIMAL (with negative equivalent) HEX 

49152 (-16384) Read Keyboard . . . $C000 
49168 (-16368) Clear Keyboard . .$C010 

Example: 10 KEY=PEEK(49152): IF KEYC128 THEN 10 

20 POKE 49168, 0 

30 PRINT "KEY: CHR$(KEY-128) 

49200 (-16336) Click Speaker $C030 

Example: FOR A=1 TO 99: BUZZ=PEEK(49200): NEXT 

49249 (-16287) Button #0 $C061 

Paddle-0 Button or Open (left) Apple key* 

49250 (-16286) Button #1 $C062 

Paddle-1 Button or Closed (right) Apple key.* 

49251 (-16285) Button #2 $C063 

‘Example: If PEEK(4924SHP) is greater than 127, then 
Paddle Button #P is being pressed— or it’s not connected. 

DOS 3.3 Pokes 

(assume DOS loaded in main memory) 

POKE 40193, PEEK(40193)-N: CALL 42964 

Moves DOS buffers down N*256 bytes. 

POKE 44452, N+1: POKE 44605, N 

Allows N file names before catalog pause. 

POKE 44460,88: POKE 44461,252 

Clears screen before catalog. 

POKE 44505,234: POKE 44506,234 

Exposes deleted file names in catalog. 

POKE 44596, 234: POKE 44597, 234: POKE 
44598, 234 Cancels catalog pause. 

POKE 49107,234: POKE 49108,234: POKE 
49109, 234 Prevents language card reload. 
POKE 49384,0 Stops drive motor. 

POKE 49385,0 Starts drive motor. 

Notes 

Apple’s main memory consists of 65,536 bytes, numbered 
zero to 65535. Every byte has a value in the range 0-255. 

■ You may Peek (look at) the value in byte number-B with 
the command— PRINT PEEK(B) 

■ You can usually Poke a new value-V into byte-B with the 
command— POKE B,V 

Values higher than 255 must be stored in two bytes: 

■ To look at the value in consecutive bytes B1-B2— 

PRINT PEEK(B1 )+PEEK(B2)*256 

■ To Poke a new value V (0-65535) into bytes B1-B2— 

POKE B1, V- 1 N T ( V/256)*256 
and POKE B2, INT(V/256) 

Note: Since almost any memory location can be Peeked or 
Poked, program listings can -eveal thousands of Peeks and 
Pokes not listed on this chart. Pokes are often used to write 
machine-language routines ’hat may be activated with the 
CALL command— the possibilities are infinite. 

Let A=PEEK(64435) and B=PEEK(64448). 

If A=6 and B=0 then Apple lie. 

If A=6 and (B>223 AND BC240) then Apple lie. 
If AO 6 then Apple II or II+. 


Page-3 DOS Vectors 


DECIMAL 


HEX 


976-978 Re-enter-DOS Vector $3D0.3D2 

1010-1012 Reset Vector $3F2.3F4 

Example: POKE 1012, 0 makes Reset boot. 

(POKE 1012,56 to restore normal Reset function.) 

1013-1015 Ampersand Vector $3F5.3F7 

Examples: POKE 1014, 165: POKE 1015, 214 makes “&” LIST. 

POKE 1014, 110: POKE 1015, 165 makes “&” CATALOG. 

POKE 1014, 18: POKE 1015, 217 makes “&” RUN. 

1016-1018 Control-Y Vector $3F8.3FA 

DOS 3.3 Locations 


DECIMAL 


HEX 


(All values assume DOS is loaded in main memory.) 

42350 Catalog-Routine $A56E 

Example: CALL 42350 catalogs a disk. 

40514 Greeting Program Run-Hag $9E42 

POKE 40514,52 and INIT a disk. When booted, DOS will attempt to 

BRUN the greeting program. POKE 40514,20 for EXEC. 

43140-43271 Commands $A884.A907 

43378-43582 Error Messages $A972.AA3E 

43616-43617 Last Bload Length $AA60.AA61 

43634-43635 Last Bload Start $AA72.AA73 

43624 Drive-Number $AA68 

Example: POKE 43624, D changes disk input/output to Drive D. 

43626 Slot-Number $AA6A 

Example: POKE 43626, S changes disk input/output to Slot S. 

43698 Control-D Command Character $AAB2 

44033 Catalog Track Number $AC01 

45991-45998 Rle-Type Codes $B3A7.B3AE 

45999-46010 Disk Volume Heading $B3AF.B3BA 

46017 Disk Volume Number $B3C1 

Pro DOS Locations 


DECIMAL 


HEX 


48944 Slot/Drive Value $BF30 

If PEEK(48944) is greater than 127 then Drive 2, otherwise Drive 1. 

47313-47422 Commands $B8D!B93E 

48840-48841 Last Bload Length .... $BEC8.BEC9 
48825-48826 Last Bload Start $BEB9.BEBA 


Useful Calls 

DECIMAL (add 65536 for positive equivalent) 


HEX 



CALL-25153 Reconnect DOS 3.3 $9DBF 

CALL-3100 Reveal hi-res page 1 $F3E4 

CALL-3086 Clear hi-res screen to black $F3F2 

CALL-3082 Clear hi-res to last color Hplotted $F3F6 

Example: HGR2: HCOLOR=5: HPLOT 0,0: CALL-3082 

CALL-2613 Hi-res coordinates to Zero-Page $F5CB 

Example: The X and Y starting coordinates of the next shape table 
DRAW or XDRAW may be determined with a CALL-2613. Then 
X=PEEK(224)+PEEK(225)*256 and Y=PEEK(226). 

CALL-1438 Pseudo-Reset $FA62 

CALL-1370 Boot $FAA6 

CALL-1321 Display all registers $FAD7 

CALL-1184 Clear screen and print “Apple ...” ... $FB60 

CALL-1036 Move cursor right $FBF4 

CALL-1008 Move cursor left $FC10 

CALL-998 Move cursor up $FC1 A 

CALL-958 Clear text from cursor to bottom .... $FC42 

Move cursor down $FC66 

Clear text-line from cursor to right . . . $FC9C 

Wait for any keypress $FD0C 

Wait for a Return keypress $FD5A 

Better Input; commas/colons o.k $FD6F 

NAME (LAST, FIRST) ; : CALL -657 
20 A$="" : FOR X=512 TO 767: IF PEEK(X)<>141 
THEN A$=A$+CHR$(PEEK(X)-1 28): NEXT X 

CALL-468 Memory move $FE2C 

A Basic memory move: OS & OE are the Old - location Start & End, and 
NS is the New Start. GOSUB 5000 to execute the move- 
5000 N=OS: LOC=60: GOSUB 5020: 

N=OE: LOC=62: GOSUB 5020: 

N=NS: LOC=66: GOSUB 5020 
5010 POKE 768, 160: POKE 769, 0: POKE 770, 76: 

POKE 771, 44: POKE 772, 254: CALL 768: RETURN 
5020 POKE LOC, N-INT(N/256)*256: 

POKE LOC+1, INT(N/256): RETURN 

CALL-415 Disassembler $FE61 

Note: Poke start address at locations 58-59 before Call. 

CALL-211 Ring bell and print “ERR” $FF2D 

Ring bell $FF3A 

Enter monitor $FF69 

Scan input buffer $FF70 

This example uses CALL -144 to execute a machine 

language routine from Basic (will not work in a subroutine): 

100 A$="300: A9 Cl 20 ED FD 18 69 01 C9 DB DO F6 
60 300 G D823G" 

110 FOR X=1 TO LEN(A$): POKE511+X, 

ASC(MI D$(A$,X,1 ))+1 28: NEXT 
120 POKE 72, 0: CALL -144 


CALL-922 
CALL-868 
CALL-756 
CALL-678 
CALL-657 
10 PRINT 


CALL-198 

CALL-151 

CALL-144 


Beagle Bros makes useful and 
entertaining Utilities, Games 
and Publications for all versions 
of Apple II® Computers. 
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APPLE COLOBS 


I DOUBLE HI-RES* & LO-RES COLORS I 


IHI-RES COLORSI 







To get on a really good mailing list, write: 

BEAGLE BROS INC. 

3990 Old Town Avenue, Suite 102C 
San Diego, California 92110 

COPYRIGHT © 1984, BERT KERSEY, BEAGLE BROS INC. 


MICRO SOfii WARE, INC. 



(Colors may vary. Try adjusting your monitor.) 


*16-color, 560x192 Double Hi-Res 
graphics may be created on 128K 
Apples with Mark Simonsen’s 
BEAGLE GRAPHICS™, now available at 
your local Apple software store. 

"APPLE" is a Registered Trade Mark of Apple Computer, Inc. 


ASCII VALUES 



Low 


High 

Low 


High 

Low 


High 

Low 


High 

Chan 


0 

$00 

ctrl-@ 

128 

$80 

32 

$20 SD 

160 

$A0 

64 

$40 

@ 

192 

$co 

96 

$60 

i 

224 

$E0 

@= 


1 

$01 

ctrl-A 

129 

$81 

33 

$21 

I 

■ 

161 

$A1 

65 

$41 

A 

193 

$C1 

97 

$61 

m 

225 

$E1 

A= 


2 

$02 

ctrl-B 

130 

$82 

34 

$22 

II 

162 

$A2 

66 

$42 

B 

194 

$C2 

98 

$62 

b 

226 

$E2 

B= 


3 

$03 

ctrl-C 

131 

$83 

35 

$23 

# 

163 

$A3 

67 

$43 

C 

195 

$C3 

99 

$63 

c 

227 

$E3 

C= 


4 

$04 

ctrl-D 

132 

$84 

36 

$24 

$ 

164 

$A4 

68 

$44 

D 

196 

$C4 

100 

$64 

d 

228 

$E4 

D= 


5 

$05 

ctrl-E 

133 

$85 

37 

$25 

% 

165 

$A5 

69 

$45 

E 

197 

$C5 

101 

$65 

e 

229 

$E5 

E= 


6 

$06 

ctrl-F 

134 

$86 

38 

$26 

& 

166 

$A6 

70 

$46 

F 

198 

$C6 

102 

$66 

f 

230 

$E6 

F= 

(Bell) 

7 

$07 

ctrl-G 

135 

$87 

39 

$27 

f 

167 

$A7 

71 

$47 

G 

199 

$C7 

103 

$67 

9 

231 

$E7 

G= 

(*■) 

8 

$08 

ctrl-H 

136 

$88 

40 

$28 

( 

168 

$A8 

72 

$48 

H 

200 

$C8 

104 

$68 

h 

232 

$E8 

H= 

(Tab) 

9 

$09 

ctrl-l 

137 

$89 

41 

$29 

) 

169 

$A9 

73 

$49 

1 

201 

$C9 

105 

$69 

i 

233 

$E9 

1= 

(\) 

10 

$0A 

ctrl-J 

138 

$8A 

42 

$2A 

* 

170 

$AA 

74 

$4A 

J 

202 

$CA 

106 

$6A 

j 

234 

$EA 

J= 

(\) 

11 

$0B 

ctrl-K 

139 

$8B 

43 

$2B 

+ 

171 

$AB 

75 

$4B 

K 

203 

$CB 

107 

$6B 

k 

235 

$EB 

K= 

12 

$0C 

ctrl-L 

140 

$8C 

44 

$2C 

9 

172 

$AC 

76 

$4C 

L 

204 

$CC 

108 

$6C 

1 

236 

$EC 

L= 

(Return) 

13 

$0D 

ctrl-M 

141 

$8D 

45 

$2D 


173 

$AD 

77 

$4D 

M 

205 

$CD 

109 

$6D 

m 

237 

$ED 

M= 


14 

$0E 

ctrl-N 

142 

$8E 

46 

$2E 

m 

174 

$AE 

78 

$4E 

N 

206 

$CE 

110 

$6E 

n 

238 

$EE 

N= 


15 

$0F 

ctrl-O 

143 

$8F 

47 

$2F 

/ 

175 

$AF 

79 

$4F 

O 

207 

$CF 

111 

$6F 

o 

239 

$EF 

0= 


16 

$10 

ctrl-P 

144 

$90 

48 

$30 

e 

176 

$B0 

80 

$50 

P 

208 

$D0 

112 

$70 

P 

240 

$F0 

P= 


17 

$11 

ctrl-Q 

145 

$91 

49 

$31 

i 

177 

$B1 

81 

$51 

Q 

209 

$D1 

113 

$71 

q 

241 

$F1 

Q= 


18 

$12 

ctrl-R 

146 

$92 

50 

$32 

2 

178 

$B2 

82 

$52 

R 

210 

$D2 

114 

$72 

r 

242 

$F2 

R= 


19 

$13 

ctrl-S 

147 

$93 

51 

$33 

3 

179 

$B3 

83 

$53 

S 

211 

$D3 

115 

$73 

s 

243 

$F3 

S= 


20 

$14 

ctrl-T 

148 

$94 

52 

$34 

4 

180 

$B4 

84 

$54 

T 

212 

$D4 

116 

$74 

t 

244 

$F4 

T= 

(-*■) 

21 

$15 

ctrl-U 

149 

$95 

53 

$35 

5 

181 

$B5 

85 

$55 

U 

213 

$D5 

117 

$75 

u 

245 

$F5 

U= 


22 

$16 

ctrl-V 

150 

$96 

54 

$36 

6 

182 

$B6 

86 

$56 

V 

214 

$D6 

118 

$76 

V 

246 

$F6 

V= 


23 

$17 

ctrl-W 151 

$97 

55 

$37 

7 

183 

$B7 

87 

$57 

W 

215 

$D7 

119 

$77 

w 

247 

$F7 

W= 


24 

$18 

ctrl-X 152 

$98 

56 

$38 

8 

184 

$B8 

88 

$58 

X 

216 

$D8 

120 

$78 

X 

248 

$F8 

X= 


25 

$19 

ctrl-Y 

153 

$99 

57 

$39 

9 

185 

$B9 

89 

$59 

Y 

217 

$D9 

121 

$79 

y 

249 

$F9 

Y= 


26 

$1 A 

ctrl-Z 

154 

$9A 

58 

$3A 

□ 

■ 

186 

$BA 

90 

$5A 

Z 

218 

$DA 

122 

$7 A 

£ 

250 

$FA 

Z= 

(Esc) 

27 

$1B 

ctrl-[ 

155 

$9B 

59 

$3B 

■ 

9 

187 

$BB 

91 

$5B 

[ 

219 

$DB 

123 

$7B 

l 

251 

$FB 

1= 


28 

$1C 

ctrl-\ 

156 

$9C 

60 

$3C 

< 

188 

$BC 

92 

$5C 

\ 

220 

$DC 

124 

$7C 

1 

252 

$FC 

V 


29 

$1D 

Ctrl-] 

157 

$9D 

61 

$3D 

= 

189 

$BD 

93 

$5D 

] 

221 

$DD 

125 

$7D 

} 

253 

$FD 

]= 


30 

$1 E 

ctrl-/\ 

158 

$9E 

62 

$3E 

> 

190 

$BE 

94 

$5E 

A 

222 

$DE 

126 

$7E 


254 

$FE 

A= 


31 

$1 F 

Ctrl- 

159 

$9F 

63 

$3F 

■ 

191 

$BF 

95 

$5F 


223 

$DF 

127 

$7F □ 255 
(Delete) 

$FF 



Mouse 


6 

k 

X 

V 

m 


J- 4' 


1 = 4J 


)= >. 


4: 


_= 1 


Main Memory Map 

65535 $FFFF 


61440 

57344 

53248 

49152 

45056 

40960 

38400 

36864 

32768 

28672 

24576 

20480 

16384 

12288 

8192 


4096 

3072 

2048 

1024 

0 


ROM 


DOS 


HIMEM 


HI-RES PAGE 2 


HI-RES PAGE 1 


'TEXTt>A<S¥2" 

TEXT PA<Srr 


$F000 

$E000 

$D000 

$cooo 

$B000 

$A000 

$9600 

$9000 

$8000 

$7000 

$6000 

$5000 

$4000 

$3000 

$2000 


$1000 

!>0C00 

S0800 

S0400 

$0000 


(Light area designates memory normally 
available to Applesoft programs.) 
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